home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / tclMotif-1.4 / programs / prog80 < prev    next >
Encoding:
Text File  |  1995-06-29  |  454 b   |  21 lines
  1. # bug in destroy?
  2. xtAppInitialize -class Program
  3.  
  4. xmForm .form managed
  5. xmPushButton .form.pb managed \
  6.     -labelString Pushme \
  7.     -leftAttachment attach_form \
  8.     -topAttachment attach_form
  9.  
  10. xmLabel .form.label managed \
  11.     -leftAttachment attach_form \
  12.     -topAttachment attach_widget \
  13.     -topWidget .form.pb
  14.  
  15. .form.label destroyCallback {puts stdout destroyed}
  16. .form.pb activateCallback {.form.label destroyWidget}
  17.  
  18. . realizeWidget
  19.  
  20. . mainLoop
  21.